home *** CD-ROM | disk | FTP | other *** search
/ BMW 3 Series Presentation / BMW_3Series_Presentation_CD.bin / Xtras / POMatic / Win / PMATIC.DIR / 00015_Script_movie script < prev    next >
Text File  |  1997-01-30  |  450b  |  18 lines
  1. on startMovie
  2.   global gPropFont,gMonoFont
  3.   
  4.   -- set up global variables for standard proportional and monospaced fonts
  5.   
  6.   if the machineType = 256 then
  7.     -- we're running in windows!
  8.     put "arial" into gPropFont
  9.     put "courier new" into gMonoFont
  10.     put "pmatic.dll" into gXObjFile
  11.   else
  12.     put "helvetica" into gPropFont
  13.     put "courier" into gMonoFont
  14.     put "pmatic.xobj" into gXObjFile
  15.   end if
  16.   
  17. end startMovie
  18.